home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / Anwendun / 7UP_PD / DESKTOP.C < prev    next >
Encoding:
C/C++ Source or Header  |  1997-01-17  |  23.5 KB  |  1,003 lines
  1. /* Iconbedienung */
  2. /*****************************************************************************
  3. *
  4. *                                              7UP
  5. *                                        Modul: DESKTOP.C
  6. *                                     (c) by TheoSoft '90
  7. *
  8. *****************************************************************************/
  9. #include <portab.h>
  10. #include <stdio.h>
  11. #include <stdlib.h>
  12. #include <string.h>
  13. #include <limits.h>
  14. #include <aes.h>
  15. #include <vdi.h>
  16. #if GEMDOS
  17. #include <ext.h>
  18. #else
  19. #include <dir.h>
  20. #endif
  21.  
  22. #include "alert.h"
  23.  
  24. #include "windows.h"
  25. #include "forms.h"
  26. #include "7UP.h"
  27. #include "undo.h"
  28.  
  29. #include "language.h"
  30.  
  31. #define FLAGS15 0x8000
  32. #define ICON_MAX 12 /* max. 30 Zeichen im Icon */
  33.  
  34. int open_work (int device);
  35. void close_work (int handle, int device);
  36. int Wtxtdraw(register WINDOW *wp, int dir, int clip[]);
  37. int menu_ikey(OBJECT *m_tree, int kstate, int key);
  38. int editor(WINDOW *wp, int state, int key);
  39. void add_icon(OBJECT *tree, int icon);
  40. void ren_icon(OBJECT *tree, int icon);
  41. void del_icon(OBJECT *tree, int icon);
  42. void desel_icons(OBJECT *tree, int from, int to, int mode);
  43. void drag_icon(OBJECT *tree, int icon);
  44. void click_icon(OBJECT *tree, int icon);
  45. void Wreadfile(char *name, int mode);
  46. void write_clip(WINDOW *wp, LINESTRUCT *beg, LINESTRUCT *end);
  47. void Wdefattr(WINDOW *wp);
  48. char *split_fname(char *pathname);
  49. hndl_prtmenu(OBJECT *tree,OBJECT *tree2,OBJECT *tree3,WINDOW *wp);
  50. void Iredraw(OBJECT *tree, int obj, int depth);
  51. int desk_fkey(OBJECT *tree,int ks,int kr);
  52. int Dhndlfkt(OBJECT *tree, int x, int y);
  53. void appl_mesag(int m0, int m2, int m3, int m4);
  54. void spool(char *filename, int copies, int mode);
  55. WINDOW *Wreadtempfile(char *filename, int mode);
  56. int inst_clipboard_icon(OBJECT *tree, int full, int empty, int mode);
  57. void loadfiles(char *path, char *pattern);
  58. int access(char *filename, int fattr);
  59.  
  60. WINDOW *Wmentry(int menuentry);
  61.  
  62. extern int gl_apid,cut,nodesktop,vdihandle,xdesk,ydesk,wdesk,hdesk,boxh;
  63. extern OBJECT *winmenu,*prtmenu,*pinstall,*layout,*divmenu;
  64. extern LINESTRUCT *begcut,*endcut;
  65. extern long begline,endline;
  66.  
  67. char menu_ctrl[7][5]={" ^F1"," ^F2"," ^F3"," ^F4"," ^F5"," ^F6"," ^F7"}; 
  68.  
  69. void iconposition(int icon, int *x, int *y, int *w, int *h)
  70. {
  71.     extern OBJECT *desktop;
  72.     if(nodesktop)
  73.     {
  74.         *x=*y=*w=*h=0;
  75.         return;
  76.     }
  77.     objc_offset(desktop,icon,x,y);
  78.     *w=desktop[icon].ob_width;
  79.     *h=desktop[icon].ob_height;
  80. }
  81.  
  82. void Iredraw(OBJECT *tree, int start_obj, int depth)
  83. {
  84.     GRECT t1,t2;
  85.  
  86.     if(nodesktop)
  87.         return;
  88.  
  89.     objc_offset(tree,start_obj,&t2.g_x,&t2.g_y);
  90.     t2.g_w = tree[start_obj].ob_width;
  91.     t2.g_h = tree[start_obj].ob_height;
  92.     _wind_get(0,WF_FIRSTXYWH,&t1.g_x,&t1.g_y,&t1.g_w,&t1.g_h);
  93.     while(t1.g_w && t1.g_h)
  94.     {
  95.         if(rc_intersect(&t2,&t1))
  96.             objc_draw(desktop,start_obj,depth,t1.g_x,t1.g_y,t1.g_w,t1.g_h);
  97.         _wind_get(0,WF_NEXTXYWH,&t1.g_x,&t1.g_y,&t1.g_w,&t1.g_h);
  98.     }
  99. }
  100.  
  101. void Dredraw(OBJECT *tree, int x, int y, int w, int h)
  102. {
  103.     GRECT t1,t2;
  104.  
  105.     if(nodesktop)
  106.         return;
  107.  
  108.     t2.g_x=x;
  109.     t2.g_y=y;
  110.     t2.g_w=w;
  111.     t2.g_h=h;
  112.     _wind_get(0,WF_FIRSTXYWH,&t1.g_x,&t1.g_y,&t1.g_w,&t1.g_h);
  113.     while(t1.g_w && t1.g_h)
  114.     {
  115.         if(rc_intersect(&t2,&t1))
  116.             objc_draw(desktop,ROOT,MAX_DEPTH,t1.g_x,t1.g_y,t1.g_w,t1.g_h);
  117.         _wind_get(0,WF_NEXTXYWH,&t1.g_x,&t1.g_y,&t1.g_w,&t1.g_h);
  118.     }
  119. }
  120.  
  121. void add_icon(OBJECT *tree, int icon)
  122. {
  123.     int i,len,offx,offy;
  124.     WINDOW *wp;
  125.     extern OBJECT *winmenu;
  126.  
  127.     if(wp=Wicon(icon))
  128.     {
  129.         for(i=WINDAT1;i<=WINDAT7;i++)
  130.             if(winmenu[i].ob_state & DISABLED)
  131.             {
  132.                 if(nodesktop)
  133.                     winmenu[i].ob_flags&=~HIDETREE;
  134.                 Menu_ienable(winmenu,i,TRUE);
  135.                 wp->mentry=i;
  136.                 break;
  137.             }
  138.         if(nodesktop)     
  139.         {
  140.             winmenu[WINDAT1-1].ob_flags&=~HIDETREE;
  141.             winmenu[WINOPALL-1].ob_height=(WINDAT7-WINOPALL+1)*boxh;
  142.             for(i=WINDAT7;i>=WINDAT1;i--)
  143.                 if(winmenu[i].ob_state&DISABLED)
  144.                 {
  145.                     winmenu[i].ob_flags|=HIDETREE;
  146.                     winmenu[WINOPALL-1].ob_height-=boxh;
  147.                 }
  148.                 else
  149.                     break;
  150.         }
  151.     }        
  152.     tree[icon].ob_flags&=~HIDETREE;
  153.  
  154.     if(nodesktop)
  155.         return;
  156.  
  157.     Iredraw(tree,icon,0);
  158. }
  159.  
  160. #define MENU_LEN 20
  161.  
  162. void ren_icon(OBJECT *tree, int icon)
  163. {
  164.     int len,offx,offy;
  165.     WINDOW *wp;
  166.     char *cp,name[25]="";
  167.     extern OBJECT *winmenu;
  168.  
  169.     if(wp=Wicon(icon))
  170.     {
  171.         cp=(char *)Wname(wp);
  172.         len=strlen(cp);
  173.         if(len>20-4)
  174.         {
  175.             strncpy(&name[2],cp,2);
  176.             name[4]=0;
  177.             strcpy(&name[4],"..");
  178.             strcpy(&name[6],&cp[len-(13-4)-3]);
  179.         }
  180.         else
  181.         {
  182.             memset(name,' ',20-2);
  183.             name[20-2]=0;
  184.             memmove(&name[2],cp,strlen(cp));
  185.         }
  186.         name[0]=name[1]=' ';
  187.         strcat(name,menu_ctrl[wp->mentry-WINDAT1]); /* Ctrlsequenz anhängen */
  188.          menu_text(winmenu,wp->mentry,name);
  189.     }        
  190.     strncpy(tree[icon].ob_spec.iconblk->ib_ptext,split_fname((char *)Wname(wp)),ICON_MAX);
  191.     tree[icon].ob_spec.iconblk->ib_ptext[ICON_MAX]=0;
  192.  
  193.     if(nodesktop)
  194.         return;
  195.  
  196.     Iredraw(tree,icon,0);
  197. }
  198.  
  199. void del_icon(OBJECT *tree, int icon)
  200. {
  201.     int i,offx,offy;
  202.     extern OBJECT *winmenu;
  203.     char *cp,name[25]="";
  204.  
  205.     WINDOW *wp;
  206.     
  207.     if(wp=Wicon(icon))
  208.     {
  209.         strcpy(name,"  Datei X            ");
  210.         name[8]=(char)(wp->mentry-WINDAT1)+'1';
  211.           menu_text(winmenu,wp->mentry,name);
  212.         Menu_icheck(winmenu,wp->mentry,FALSE);
  213.         Menu_ienable(winmenu,wp->mentry,FALSE);
  214.  
  215.         if(nodesktop)     
  216.         {
  217.             winmenu[WINOPALL-1].ob_height=(WINDAT7-WINOPALL+1)*boxh;
  218.             for(i=WINDAT7;i>=WINDAT1;i--)
  219.                 if(winmenu[i].ob_state&DISABLED)
  220.                 {
  221.                     winmenu[i].ob_flags|=HIDETREE;
  222.                     winmenu[WINOPALL-1].ob_height-=boxh;
  223.                 }
  224.                 else
  225.                     break;
  226.             if(winmenu[WINOPALL-1].ob_height==(WINDAT1-WINOPALL)*boxh)
  227.             {
  228.                 winmenu[WINDAT1-1].ob_flags|=HIDETREE;
  229.                 winmenu[WINOPALL-1].ob_height-=boxh;
  230.             }
  231.         }
  232.         wp->mentry=0;
  233.     }
  234.     tree[icon].ob_state&=~SELECTED;
  235.     tree[icon].ob_flags|=HIDETREE;
  236.  
  237.     if(nodesktop)
  238.         return;
  239.  
  240.     objc_offset(tree,icon,&offx,&offy); /* Desktop, nicht Icon neuzeichnen!!! */
  241.     Dredraw(tree,offx,offy,tree[icon].ob_width,tree[icon].ob_height);
  242. }
  243.  
  244. int is_selected(OBJECT *tree, int from, int to)
  245. {
  246.     register int i,count=0;
  247.  
  248.     if(nodesktop)
  249.         return(FALSE);
  250.  
  251.     for(i=from; i<=to; i++)          /* icon selektieren */
  252.         if(tree[i].ob_state & SELECTED)
  253.             count++;
  254.     return(count);
  255. }
  256.  
  257. void sel_icons(OBJECT *tree, int from, int to, int mode)
  258. {
  259.     register int i;
  260.  
  261.     if(nodesktop)
  262.         return;
  263.  
  264.     for(i=from; i<=to; i++)          /* icon selektieren */
  265.         if(!(tree[i].ob_state & SELECTED) && !(tree[i].ob_flags & HIDETREE))
  266.         {
  267.             tree[i].ob_state |= SELECTED;
  268.             if(mode)
  269.                 Iredraw(tree,i,1);
  270.         }
  271. }
  272.  
  273. void desel_icons(OBJECT *tree, int from, int to, int mode)
  274. {
  275.     register int i;
  276.  
  277.     if(nodesktop)
  278.         return;
  279.  
  280.     for(i=from; i<=to; i++)          /* icon deselektieren */
  281.         if(tree[i].ob_state & SELECTED && !(tree[i].ob_flags & HIDETREE))
  282.         {
  283.             tree[i].ob_state &= ~SELECTED;
  284.             tree[i].ob_flags &= ~FLAGS15;            /* löschen */
  285.             if(mode)
  286.                 Iredraw(tree,i,1);
  287.         }
  288. }
  289.  
  290. static MEVENT mevent=
  291. {
  292.     MU_BUTTON,
  293.     1,0,0,
  294.     0,0,0,0,0,
  295.     0,0,0,0,0,
  296.     NULL,
  297.     0L,
  298.     0,0,0,0,0,0,
  299. /* nur der Vollständigkeit halber die Variablen von XGEM */
  300.     0,0,0,0,0,
  301.     0,
  302.     0L,
  303.     0L,0L
  304. };
  305.  
  306. #define odd(i) ((i)&1)
  307.  
  308. static void set_style (int handle, int expr)
  309. {
  310.   vsl_udsty (handle, odd (expr) ? 0xAAAA : 0x5555);
  311. } /* set_style */
  312.  
  313. static void drawframe(int handle,int x, int y, int w, int h)
  314. {
  315.     register int xy[10];
  316.  
  317.     xy [0] = x;
  318.     xy [1] = y;
  319.     xy [2] = xy [0];
  320.     xy [3] = xy [1] + h - 1;
  321.     xy [4] = xy [0] + w - 1;
  322.     xy [5] = xy [3];
  323.     xy [6] = xy [4];
  324.     xy [7] = xy [1];
  325.     xy [8] = xy [0];
  326.     xy [9] = xy [1];
  327.  
  328.     set_style (handle, xy [0] + xy [1]);
  329.     v_pline (handle, 2, &xy [0]);
  330.     set_style (handle, xy [3]);
  331.     v_pline (handle, 2, &xy [2]);
  332.     set_style (handle, xy [4] + xy [5]);
  333.     v_pline (handle, 2, &xy [4]);
  334.     set_style (handle, xy [7]);
  335.     v_pline (handle, 2, &xy [6]);
  336. }
  337.  
  338. static GRECT *size_of_all_icons(OBJECT *tree, int from, int to)
  339. {
  340.     static GRECT rect;
  341.     int i,x,y;
  342.  
  343.     rect.g_x=INT_MAX;
  344.     rect.g_y=INT_MAX;
  345.     rect.g_w=0;
  346.     rect.g_h=0;
  347.  
  348.     for(i=from; i<=to; i++)                /* x,y */
  349.     {
  350.         if(tree[i].ob_state & SELECTED)
  351.         {
  352.             objc_offset(tree,i,&x,&y);
  353.             rect.g_x= min(rect.g_x,x);
  354.             rect.g_y= min(rect.g_y,y);
  355.         }
  356.     }
  357.     for(i=from; i<=to; i++)                /* w,h */
  358.     {
  359.         if(tree[i].ob_state & SELECTED)
  360.         {
  361.             objc_offset(tree,i,&x,&y);
  362.             rect.g_w= max(rect.g_w,x+tree[i].ob_width-rect.g_x);
  363.             rect.g_h= max(rect.g_h,y+tree[i].ob_height-rect.g_y);
  364.         }
  365.     }
  366.     return(&rect);
  367. }
  368.  
  369.  
  370. static int graf_exdragbox(OBJECT *tree, int icon,
  371.     int width, int height, int offx, int offy,
  372.     int xd, int yd, int wd, int hd, int *xret, int *yret)
  373. {
  374.     int i,xdiff,ydiff,mx,my,ret,pxy[4],origin,ooum=0,noum=0;
  375.     register int lw,rw,uh,lh;
  376.     int xoff,yoff,oldx,oldy;
  377.  
  378.     GRECT *rect;
  379.     ICONBLK *iconblk;
  380.  
  381.     oldx=offx;
  382.     oldy=offy;
  383.  
  384.     pxy[0]=xd;
  385.     pxy[1]=yd;
  386.     pxy[2]=xd+wd-1;
  387.     pxy[3]=yd+hd-1;
  388.     vs_clip(vdihandle, TRUE, pxy);
  389.  
  390.     rect=size_of_all_icons(tree,DESKICN1,DESKICND);
  391.     lw=offx - rect->g_x;
  392.     rw=rect->g_x + rect->g_w - offx;
  393.     uh=offy - rect->g_y;
  394.     lh=rect->g_y + rect->g_h - offy;
  395.  
  396.     graf_mouse(M_OFF,NULL);
  397.     for(i=DESKICN1; i<=DESKICND; i++)
  398.     {
  399.         if(tree[i].ob_state & SELECTED)
  400.         {
  401.             objc_offset(tree,i,&xoff,&yoff);
  402.             iconblk=tree[i].ob_spec.iconblk;
  403.             drawframe(vdihandle,xoff+iconblk->ib_xicon+(offx-oldx),
  404.                               yoff+iconblk->ib_yicon+(offy-oldy),
  405.                                      iconblk->ib_wicon,
  406.                                      iconblk->ib_hicon);
  407.             drawframe(vdihandle,xoff+iconblk->ib_xtext+(offx-oldx),
  408.                               yoff+iconblk->ib_ytext+(offy-oldy),
  409.                                      iconblk->ib_wtext,
  410.                                      iconblk->ib_htext);
  411.             tree[i].ob_flags |= FLAGS15; /* als FLAGS15 markieren */
  412.         }
  413.     }
  414.     graf_mouse(M_ON,NULL);
  415.  
  416.     graf_mkstate(&mx,&my,&ret,&ret);
  417.     origin=objc_find(tree,ROOT,MAX_DEPTH,mx,my);
  418.  
  419.     do
  420.     {
  421.         evnt_event(&mevent);
  422.         if(mevent.e_mx != mx || mevent.e_my != my)
  423.         {
  424.             graf_mouse(M_OFF,NULL);
  425.             for(i=DESKICN1; i<=DESKICND; i++)
  426.             {
  427.                 if(tree[i].ob_flags & FLAGS15 && tree[i].ob_state & SELECTED)
  428.                 {
  429.                     objc_offset(tree,i,&xoff,&yoff);
  430.                     iconblk=tree[i].ob_spec.iconblk;
  431.                     drawframe(vdihandle,xoff+iconblk->ib_xicon+(offx-oldx),
  432.                                       yoff+iconblk->ib_yicon+(offy-oldy),
  433.                                              iconblk->ib_wicon,
  434.                                              iconblk->ib_hicon);
  435.                     drawframe(vdihandle,xoff+iconblk->ib_xtext+(offx-oldx),
  436.                                       yoff+iconblk->ib_ytext+(offy-oldy),
  437.                                              iconblk->ib_wtext,
  438.                                              iconblk->ib_htext);
  439.                 }
  440.             }
  441.  
  442.             mx=mevent.e_mx;
  443.             my=mevent.e_my;
  444.             noum=objc_find(tree,ROOT,MAX_DEPTH,mx,my);  /* Objekt finden */
  445.  
  446.             if(noum!=ooum && !(tree[noum].ob_state & SELECTED))
  447.             {
  448.                 if(ooum>ROOT && ooum!=origin)
  449.                     desel_icons(tree,ooum,ooum,TRUE);/* altes Objekt desel. */
  450.                 if(noum>ROOT && noum!=origin)
  451.                     sel_icons(tree,noum,noum,TRUE);  /* neues Objekt sel.    */
  452.                 ooum=noum;
  453.             }
  454.  
  455.             offx=mx-width/2;              /* neuen Dragrahmen errechenen */
  456.             offy=my-height/2;
  457.  
  458.             if(offx-lw<xd)
  459.                 offx=xd+lw;
  460.             if(offy-uh<yd)
  461.                 offy=yd+uh;
  462.             if(offx+rw>xd+wd-1)
  463.                 offx=xd+wd-1-rw;
  464.             if(offy+lh>yd+hd-1)
  465.                 offy=yd+hd-1-lh;
  466.  
  467.             for(i=DESKICN1; i<=DESKICND; i++)
  468.             {
  469.                 if(tree[i].ob_flags & FLAGS15 && tree[i].ob_state & SELECTED)
  470.                 {
  471.                     objc_offset(tree,i,&xoff,&yoff);
  472.                     iconblk=tree[i].ob_spec.iconblk;
  473.                     drawframe(vdihandle,xoff+iconblk->ib_xicon+(offx-oldx),
  474.                                       yoff+iconblk->ib_yicon+(offy-oldy),
  475.                                              iconblk->ib_wicon,
  476.                                              iconblk->ib_hicon);
  477.                     drawframe(vdihandle,xoff+iconblk->ib_xtext+(offx-oldx),
  478.                                       yoff+iconblk->ib_ytext+(offy-oldy),
  479.                                              iconblk->ib_wtext,
  480.                                              iconblk->ib_htext);
  481.                 }
  482.             }
  483.             graf_mouse(M_ON,NULL);
  484.         }
  485.     }
  486.     while(mevent.e_mb & 0x0001);
  487.     graf_mouse(M_OFF,NULL);
  488.     for(i=DESKICN1; i<=DESKICND; i++)
  489.     {
  490.         if(tree[i].ob_flags & FLAGS15 && tree[i].ob_state & SELECTED)
  491.         {
  492.             objc_offset(tree,i,&xoff,&yoff);
  493.             iconblk=tree[i].ob_spec.iconblk;
  494.             drawframe(vdihandle,xoff+iconblk->ib_xicon+(offx-oldx),
  495.                               yoff+iconblk->ib_yicon+(offy-oldy),
  496.                                      iconblk->ib_wicon,
  497.                                      iconblk->ib_hicon);
  498.             drawframe(vdihandle,xoff+iconblk->ib_xtext+(offx-oldx),
  499.                               yoff+iconblk->ib_ytext+(offy-oldy),
  500.                                      iconblk->ib_wtext,
  501.                                      iconblk->ib_htext);
  502.         }
  503.     }
  504.     graf_mouse(M_ON,NULL);
  505.     vs_clip(vdihandle, FALSE, pxy);
  506.  
  507.     *xret=offx;                                             /* return-Werte */
  508.     *yret=offy;
  509.     return(ooum);
  510. }
  511.  
  512. void drag_icon(OBJECT *tree, int icon)
  513. {
  514.     LINESTRUCT *line;
  515.     extern LINESTRUCT *begcut,*endcut;
  516.     WINDOW *wp,*wp2;
  517.     static char filename[PATH_MAX]; /* muβ static sein, weil Spooler sonst */
  518.                                       /* den lokalen String nicht findet      */
  519.  
  520.     int x,y,offx,offy,width,height,objc;
  521.     int xoff,yoff,oldx,oldy,i,mx,my,mc,ret;
  522.  
  523.     if(nodesktop)
  524.         return;
  525.  
  526.     wp=Wgettop();
  527.     if(!(tree[icon].ob_state & SELECTED)) /* wenn es nocht nicht selektiert ist */
  528.     {                                                 /* Rest desel */
  529.         desel_icons(tree,DESKICN1,DESKICND,TRUE);
  530.         sel_icons(tree,icon,icon,TRUE);
  531.     }                                                 /* sonst mehrere Icons draggen */
  532.     evnt_timer(125,0);
  533.     graf_mkstate(&mx,&my,&mc,&ret);
  534.     if(!mc)                                            /* nur invertieren, für Info... */
  535.         return;
  536.  
  537.     graf_mouse(FLAT_HAND,0L);
  538.     objc_offset(tree,icon,&offx,&offy);
  539. /*
  540.     printf("\33H%3d %3d %3d ",ydesk,offy,tree[icon].ob_height);
  541. */
  542.     oldx=offx;
  543.     oldy=offy;
  544.  
  545.     width =tree[icon].ob_spec.iconblk->ib_wtext;
  546.     height=tree[icon].ob_spec.iconblk->ib_hicon
  547.             +tree[icon].ob_spec.iconblk->ib_htext;
  548.     objc=graf_exdragbox(tree,icon,width,height,offx,offy,
  549.                               xdesk,ydesk,wdesk,hdesk,&x,&y);
  550.     graf_mouse(ARROW,0L);
  551.     graf_mkstate(&mx,&my,&ret,&ret);
  552.  
  553.     if((ret=wind_find(mx,my))>0)  /* Klemmbretticon ins oberste Fenster */
  554.     {
  555.         if(ret==Wh(wp))
  556.         {
  557.             switch(icon)
  558.             {
  559.                 case DESKICN1:
  560.                 case DESKICN2:
  561.                 case DESKICN3:
  562.                 case DESKICN4:
  563.                 case DESKICN5:
  564.                 case DESKICN6:
  565.                 case DESKICN7:
  566.                     wp2=Wicon(icon);
  567.                     if(!cut)
  568.                          hide_blk(wp,begcut,endcut);
  569.                      else
  570.                         free_blk(wp,begcut);
  571.                     if(_read_blk(wp,wp2->name,&begcut,&endcut)>0)
  572.                     {
  573.                         store_undo(wp, &undo, begcut, endcut, WINEDIT, EDITCUT);
  574.                         i=endcut->used;
  575.                         graf_mouse(M_OFF,0L);
  576.                         Wcursor(wp);
  577.                         if((wp->w_state&COLUMN))
  578.                             paste_col(wp,begcut,endcut);
  579.                         else
  580.                             paste_blk(wp,begcut,endcut);
  581.                         Wcursor(wp);
  582.                         graf_mouse(M_ON,0L);
  583.                         endcut->endcol=i;
  584.                         hndl_blkfind(wp,begcut,endcut,SEAREND);
  585.                     }
  586.                     begline=endline=0L;
  587.                     begcut=endcut=NULL;
  588.                     break;
  589.                 case DESKICNB:
  590.                     if(!cut)
  591.                          hide_blk(wp,begcut,endcut);
  592.                      else
  593.                         free_blk(wp,begcut);
  594.                     if(read_clip(wp,&begcut,&endcut))
  595.                     {
  596.                         store_undo(wp, &undo, begcut, endcut, WINEDIT, EDITCUT);
  597.                         i=endcut->used;
  598.                         graf_mouse(M_OFF,0L);
  599.                         Wcursor(wp);
  600.                         if((wp->w_state&COLUMN))
  601.                             paste_col(wp,begcut,endcut);
  602.                         else
  603.                             paste_blk(wp,begcut,endcut);
  604.                         Wcursor(wp);
  605.                         graf_mouse(M_ON,0L);
  606.                         endcut->endcol=i;
  607.                         hndl_blkfind(wp,begcut,endcut,SEAREND);
  608.                     }
  609.                     begcut=endcut=NULL;
  610.                     break;
  611.                 default:
  612.                     form_alert(1,Adesktop[0]);
  613.                     break;
  614.             }
  615.         }
  616. /*
  617.         desel_icons(tree,DESKICN1,DESKICND,TRUE);
  618. */
  619.         return;
  620.     }
  621.  
  622.     for(i=DESKICN1; i<=DESKICND; i++)
  623.     {
  624.         if(tree[i].ob_flags & FLAGS15 && tree[i].ob_state & SELECTED)
  625.         {
  626.             switch(objc) /* auf dieses Ziel wurde Icon gezogen */
  627.             {
  628.                 case DESKICN1:
  629.                 case DESKICN2:
  630.                 case DESKICN3:
  631.                 case DESKICN4:
  632.                 case DESKICN5:
  633.                 case DESKICN6:
  634.                 case DESKICN7:
  635.                         form_alert(1,Adesktop[0]);
  636.                     break;
  637.                 case DESKICN8: /* Papierkorb */
  638.                 case DESKICND: /* voller Papierkorb */
  639.                     switch(i) /* dies ist das bewegte Icon */
  640.                     {
  641.                         case DESKICN1:
  642.                         case DESKICN2:
  643.                         case DESKICN3:
  644.                         case DESKICN4:
  645.                         case DESKICN5:
  646.                         case DESKICN6:
  647.                         case DESKICN7:
  648.                             Gsave(Wicon(i));
  649.                             delete(Wicon(i),tree,i);
  650.                             break;
  651.                         case DESKICN8: /* Papierkorb */
  652.                         case DESKICND: /* voller Papierkorb */
  653.                         case DESKICN9: /* Drucker     */
  654.                         case DESKICNA: /* DISK         */
  655.                             form_alert(1,Adesktop[0]);
  656.                             break;
  657.                         case DESKICNB: /* Klemmbrett */
  658.                             graf_mouse(BUSY_BEE,NULL);
  659.                             scrp_clear();
  660.                             inst_clipboard_icon(tree,DESKICNB,DESKICNC,FALSE);
  661.                             graf_mouse(ARROW,NULL);
  662.                             break;
  663.                         case DESKICNC:
  664.                             form_alert(1,Adesktop[1]);
  665.                             break;
  666.                     }
  667.                     break;
  668.                 case DESKICN9: /* Drucker     */
  669.                     switch(i)
  670.                     {
  671.                         case DESKICN1:
  672.                         case DESKICN2:
  673.                         case DESKICN3:
  674.                         case DESKICN4:
  675.                         case DESKICN5:
  676.                         case DESKICN6:
  677.                         case DESKICN7:
  678.                             hndl_prtmenu(prtmenu,layout,pinstall,Wicon(i));
  679.                             break;
  680.                         case DESKICN8: /* Papierkorb */
  681.                         case DESKICND: /* voller Papierkorb */
  682.                         case DESKICN9: /* Drucker     */
  683.                         case DESKICNA: /* DISK         */
  684.                             form_alert(1,Adesktop[0]);
  685.                             break;
  686.                         case DESKICNB: /* Klemmbrett */
  687.                             if(form_alert(2,Adesktop[2])==2)
  688.                             {
  689.                                 scrp_read(filename);
  690.                                 if(*filename)
  691.                                 {
  692.                                     complete_path(filename);
  693. /*
  694.                                     if(filename[strlen(filename)-1]!='\\')
  695.                                         strcat(filename,"\\");
  696. */
  697.                                     strcat(filename,"SCRAP.TXT");
  698.                                     spool(filename,1,FALSE);
  699.                                 }
  700.                             }
  701.                             break;
  702.                         case DESKICNC:
  703.                             form_alert(1,Adesktop[1]);
  704.                             break;
  705.                     }
  706.                     break;
  707.                 case DESKICNA: /* Disk         */
  708.                     switch(i)
  709.                     {
  710.                         case DESKICN1:
  711.                         case DESKICN2:
  712.                         case DESKICN3:
  713.                         case DESKICN4:
  714.                         case DESKICN5:
  715.                         case DESKICN6:
  716.                         case DESKICN7:
  717.                             write_file(Wicon(i), TRUE); /* immer SAVE AS..., weil besser */
  718.                             break;
  719.                         case DESKICN8: /* Papierkorb */
  720.                         case DESKICND: /* voller Papierkorb */
  721.                         case DESKICN9: /* Drucker     */
  722.                         case DESKICNA: /* DISK         */
  723.                             form_alert(1,Adesktop[0]);
  724.                             break;
  725.                         case DESKICNB: /* Klemmbrett */
  726.                             form_alert(1,Adesktop[3]);
  727.                             break;
  728.                         case DESKICNC: /* leeres Klemmbrett */
  729.                             form_alert(1,Adesktop[1]);
  730.                             break;
  731.                     }
  732.                     break;
  733.                 case DESKICNB: /* Klemmbrett */
  734.                 case DESKICNC: /* leeres K. */
  735.                     switch(i)
  736.                     {
  737.                         case DESKICN1:
  738.                         case DESKICN2:
  739.                         case DESKICN3:
  740.                         case DESKICN4:
  741.                         case DESKICN5:
  742.                         case DESKICN6:
  743.                         case DESKICN7:
  744.                             wp=Wicon(icon);
  745.                             for(line=wp->fstr; line->next; line=line->next)
  746.                             {
  747.                                 line->begcol=0;
  748.                                 line->endcol=STRING_LENGTH;
  749.                             }
  750.                             write_clip(wp, wp->fstr, line);
  751.                             break;
  752.                         case DESKICN8: /* leerer Papierkorb */
  753.                         case DESKICND: /* voller Papierkorb */
  754.                         case DESKICN9: /* Drucker     */
  755.                         case DESKICNA: /* DISK         */
  756.                         case DESKICNB: /* Klemmbrett */
  757.                         case DESKICNC: /* ungültig */
  758.                             form_alert(1,Adesktop[0]);
  759.                             break;
  760.                     }
  761.                     break;
  762.                 case ROOT:
  763.                     if(x != offx || y != offy) /* nur draggen */
  764.                     {
  765.                         objc_offset(tree,i,&xoff,&yoff);
  766.                         tree[i].ob_x=align(xoff+(x-offx),8);
  767.                         tree[i].ob_y=align(yoff+(y-ydesk-offy),8);
  768.                         Dredraw(tree,xoff,yoff,tree[i].ob_width,tree[i].ob_height);
  769.                         switch(i) /* welches Icon wurde verschoben? */
  770.                         {
  771.                             case DESKICN8: /* leerer P */
  772.                                 tree[DESKICND].ob_x=tree[i].ob_x;
  773.                                 tree[DESKICND].ob_y=tree[i].ob_y;
  774.                                 break;
  775.                             case DESKICND: /* voller P */
  776.                                 tree[DESKICN8].ob_x=tree[i].ob_x;
  777.                                 tree[DESKICN8].ob_y=tree[i].ob_y;
  778.                                 break;
  779.                             case DESKICNB: /* volles K */
  780.                                 tree[DESKICNC].ob_x=tree[i].ob_x;
  781.                                 tree[DESKICNC].ob_y=tree[i].ob_y;
  782.                                 break;
  783.                             case DESKICNC: /* leeres K */
  784.                                 tree[DESKICNB].ob_x=tree[i].ob_x;
  785.                                 tree[DESKICNB].ob_y=tree[i].ob_y;
  786.                                 break;
  787.                         }
  788.                     }
  789.                     break;
  790.             }
  791.             Iredraw(tree,i,1);
  792.         }
  793.     }
  794.     desel_icons(tree,objc,objc,TRUE);
  795.     return;
  796. }
  797.  
  798. static GRECT *rubber(int x, int y)
  799. {
  800.     static GRECT rub;
  801.     rub.g_x=x;
  802.     rub.g_y=y;
  803.     graf_rubbox(x,y,-32767,-32767,&rub.g_w,&rub.g_h);
  804.     if(rub.g_w < 0)
  805.     {
  806.         rub.g_x +=  rub.g_w;
  807.         rub.g_w  = -rub.g_w;
  808.     }
  809.     if(rub.g_h < 0)
  810.     {
  811.         rub.g_y +=  rub.g_h;
  812.         rub.g_h  = -rub.g_h;
  813.     }
  814.     return(&rub);
  815. }
  816.  
  817. int rc_intersect(int p1[], int p2[]);
  818.  
  819. int mark_icons(OBJECT *tree, int mx, int my)
  820. {
  821.     ICONBLK *iconblk;
  822.     GRECT *grect;
  823.     int xoff,yoff,icon=0,mc,ret,p1[4],p2[4],p3[4],p4[4];
  824.  
  825.     if(nodesktop)
  826.         return(FALSE);
  827.  
  828.     evnt_timer(125,0);
  829.     graf_mkstate(&ret,&ret,&mc,&ret);
  830.     ret=0;
  831.     if(!mc)                                            /* nur invertieren, für Info... */
  832.         return(FALSE);
  833.     graf_mouse(POINT_HAND,NULL);
  834.     grect=rubber(mx,my);
  835.     graf_mouse(ARROW,NULL);
  836.  
  837.     for(icon=DESKICN1; icon<=DESKICND; icon++)
  838.     {
  839.         objc_offset(tree,icon,&xoff,&yoff);
  840.         iconblk=tree[icon].ob_spec.iconblk;
  841.         p1[0]=p2[0]=grect->g_x; /*- xdesk;*/
  842.         p1[1]=p2[1]=grect->g_y; /*- ydesk;*/
  843.         p1[2]=p2[2]=grect->g_w;
  844.         p1[3]=p2[3]=grect->g_h;
  845.  
  846.         p3[0]=iconblk->ib_xicon+xoff;
  847.         p3[1]=iconblk->ib_yicon+yoff;
  848.         p3[2]=iconblk->ib_wicon;
  849.         p3[3]=iconblk->ib_hicon;
  850.  
  851.         p4[0]=iconblk->ib_xtext+xoff;
  852.         p4[1]=iconblk->ib_ytext+yoff;
  853.         p4[2]=iconblk->ib_wtext;
  854.         p4[3]=iconblk->ib_htext;
  855.  
  856.         if(rc_intersect(p3,p1) || rc_intersect(p4,p2))
  857.         {
  858.             sel_icons(tree,icon,icon,TRUE);
  859.             ret=TRUE;
  860.         }
  861.     }
  862.     return(ret);
  863. }
  864.  
  865. WINDOW *Wgetwp(char *filename);
  866.  
  867. void click_icon(OBJECT *tree, int icon)
  868. {
  869.     WINDOW *wp;
  870.     char *cp,filename[PATH_MAX];
  871.  
  872.     if(nodesktop)
  873.         return;
  874.  
  875.     wp=Wgettop();
  876.     sel_icons(tree,icon,icon,TRUE);
  877.     if(icon>=DESKICN1 && icon<=DESKICN7) /* Datei öffnen */
  878.     {
  879.         Wopen(Wicon(icon));
  880.         undo.menu=WINFILE;
  881.         undo.item=WINCLOSE;
  882.     }
  883.     if(icon==DESKICN8 || icon==DESKICND) /* Trashcan */
  884.         inst_trashcan_icon(tree,DESKICN8,DESKICND,TRUE);
  885.     if(icon==DESKICND)                        /* Gemini-Trashcan */
  886.     {
  887.         if((cp=getenv("TRASHDIR"))!=NULL)
  888.         {
  889.             strcpy(filename,cp);
  890.             complete_path(filename);
  891. /*
  892.             if(filename[strlen(filename)-1]!='\\')
  893.                 strcat(filename,"\\*.*");
  894. */
  895.             if(gettrashname(/*strupr*/(filename),EMPTYTRASH))
  896.             {
  897.                 Wreadfile(filename,FALSE);
  898.                 unlink(filename);
  899.                 inst_trashcan_icon(tree,DESKICN8,DESKICND,FALSE);
  900.             }
  901.         }
  902.     }
  903.     if(icon==DESKICN8)/* Mülleimer */
  904.         delete_file();
  905.     if(icon==DESKICN9)/* Drucker */
  906.         spool_file();
  907.     if(icon==DESKICNA) /* Fileselectbox zeigen */
  908.         loadfiles("","");
  909.     if(icon==DESKICNB || icon==DESKICNC) /* Clipbrd */
  910.         icon=inst_clipboard_icon(tree,DESKICNB,DESKICNC,TRUE);
  911.     if(icon==DESKICNB) /* Clipbrd */
  912.     {
  913.         scrp_read(filename);
  914.         if(*filename)
  915.         {
  916.             complete_path(filename);
  917. /*
  918.             if(filename[strlen(filename)-1]!='\\')
  919.                 strcat(filename,"\\");
  920. */
  921.             strcat(filename,"SCRAP.TXT");
  922.             Wreadfile(filename,FALSE);
  923.         }
  924.     }
  925.     if(icon==DESKICNC)
  926.     { /* leer */
  927.         form_alert(1,Adesktop[1]);
  928.     }
  929.     desel_icons(tree,icon,icon,TRUE);
  930. }
  931.  
  932. int inst_trashcan_icon(OBJECT *tree, int old, int new, int mode)
  933. {
  934.     char *cp, filename[PATH_MAX];
  935.  
  936.     if(nodesktop)
  937.         return(FALSE);
  938.  
  939.     if((divmenu[DIVPAPER].ob_state & SELECTED) &&
  940.         (cp=getenv("TRASHDIR"))!=NULL)
  941.     {
  942.         strcpy(filename,cp);
  943.         complete_path(filename);
  944. /*
  945.         if(filename[strlen(filename)-1]!='\\')
  946.             strcat(filename,"\\");
  947. */
  948.         strcat(filename,"*.*");
  949.         if(access(filename,0))
  950.         {
  951.             if(mode)
  952.                 tree[new].ob_state|=SELECTED;
  953.             del_icon(tree,old);
  954.             add_icon(tree,new);
  955.             return(new);
  956.         }
  957.     }
  958.     if(mode)
  959.         tree[old].ob_state|=SELECTED;
  960.     del_icon(tree,new);
  961.     add_icon(tree,old);
  962.     return(old);
  963. }
  964.  
  965. int inst_clipboard_icon(OBJECT *tree, int full, int empty, int mode)
  966. {
  967.     char filename[PATH_MAX];
  968.  
  969.     if(nodesktop)
  970.         return(FALSE);
  971.  
  972.     scrp_read(filename);
  973. #if GEMDOS
  974.     if(!*filename)
  975.     {
  976.         if(create_clip())
  977.             scrp_read(filename);
  978.     }
  979. #endif
  980.     if(*filename)
  981.     {
  982.         complete_path(filename);
  983. /*
  984.         if(filename[strlen(filename)-1]!='\\')
  985.             strcat(filename,"\\");
  986. */
  987.         strcat(filename,"SCRAP.TXT");
  988.         if(access(filename,0))
  989.         {
  990.             if(mode)
  991.                 tree[full].ob_state|=SELECTED;
  992.             del_icon(tree,empty);
  993.             add_icon(tree,full);
  994.             return(full);
  995.         }
  996.     }
  997.     if(mode)
  998.         tree[empty].ob_state|=SELECTED;
  999.       del_icon(tree,full);
  1000.     add_icon(tree,empty);
  1001.     return(empty);
  1002. }ə
  1003.